Filename | (eval 1135)[/usr/lib/x86_64-linux-gnu/perl5/5.20/Template/Document.pm:78] |
Statements | Executed 0 statements in 0s |
Eval Invoked At | /usr/lib/x86_64-linux-gnu/perl5/5.20/Template/Document.pm line 78 |
Sibling evals | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12 |
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | sub { | ||||
2 | my $context = shift || die "template sub called without context\n"; | ||||
3 | 4 | 11µs | my $stash = $context->stash; # spent 11µs making 4 calls to Template::Context::stash, avg 3µs/call | ||
4 | my $output = ''; | ||||
5 | my $_tt_error; | ||||
6 | |||||
7 | eval { BLOCK: { | ||||
8 | #line 1 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
9 | # USE | ||||
10 | $stash->set('Branches', | ||||
11 | $context->plugin('Branches')); | ||||
12 | $output .= "\n<div id=\"header\" class=\"navbar navbar-static-top\">\n <div class=\"navbar-inner\">\n <ul id=\"toplevelmenu\" class=\"nav\">\n "; | ||||
13 | #line 5 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
14 | if (($stash->get('CAN_user_circulate'))) { | ||||
15 | $output .= "<li><a href=\"/cgi-bin/koha/circ/circulation-home.pl\">Circulation</a></li>"; | ||||
16 | } | ||||
17 | |||||
18 | $output .= "\n "; | ||||
19 | #line 6 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
20 | if (($stash->get('CAN_user_borrowers'))) { | ||||
21 | $output .= "<li><a href=\"/cgi-bin/koha/members/members-home.pl\">Patrons</a></li>"; | ||||
22 | } | ||||
23 | |||||
24 | $output .= "\n "; | ||||
25 | #line 7 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
26 | if (($stash->get('CAN_user_catalogue'))) { | ||||
27 | $output .= "<li><a href=\"/cgi-bin/koha/catalogue/search.pl\">Search</a></li>"; | ||||
28 | } | ||||
29 | |||||
30 | $output .= "\n "; | ||||
31 | #line 10 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
32 | if (($stash->get('intranetbookbag'))) { | ||||
33 | $output .= "\n <li><a href=\"#\" id=\"cartmenulink\">Cart<span id=\"basketcount\"></span></a></li>\n "; | ||||
34 | } | ||||
35 | |||||
36 | $output .= "\n "; | ||||
37 | #line 11 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
38 | $output .= $stash->get('IntranetNav'); | ||||
39 | $output .= "\n <li class=\"dropdown\">\n <a href=\"#\" class=\"dropdown-toggle\" data-toggle=\"dropdown\">More <b class=\"caret\"></b></a>\n <ul class=\"dropdown-menu\">\n <li><a href=\"/cgi-bin/koha/virtualshelves/shelves.pl\">Lists</a></li>\n "; | ||||
40 | #line 18 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
41 | if (($stash->get('CAN_user_editcatalogue_edit_catalogue') || $stash->get('CAN_user_editcatalogue_edit_items'))) { | ||||
42 | $output .= "\n <li><a href=\"/cgi-bin/koha/cataloguing/addbooks.pl\">Cataloging</a></li>\n "; | ||||
43 | } | ||||
44 | |||||
45 | $output .= "\n "; | ||||
46 | #line 21 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
47 | if (($stash->get('CAN_user_acquisition'))) { | ||||
48 | $output .= "\n <li><a href=\"/cgi-bin/koha/acqui/acqui-home.pl\">Acquisitions</a></li>\n "; | ||||
49 | } | ||||
50 | |||||
51 | $output .= "\n <li><a href=\"/cgi-bin/koha/authorities/authorities-home.pl\">Authorities</a></li>\n "; | ||||
52 | #line 25 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
53 | if (($stash->get('CAN_user_serials'))) { | ||||
54 | $output .= "\n <li><a href=\"/cgi-bin/koha/serials/serials-home.pl\">Serials</a></li>\n "; | ||||
55 | } | ||||
56 | |||||
57 | $output .= "\n "; | ||||
58 | #line 28 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
59 | if (($stash->get('UseCourseReserves'))) { | ||||
60 | $output .= "\n <li><a href=\"/cgi-bin/koha/course_reserves/course-reserves.pl\">Course reserves</a></li>\n "; | ||||
61 | } | ||||
62 | |||||
63 | $output .= "\n "; | ||||
64 | #line 31 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
65 | if (($stash->get('CAN_user_reports'))) { | ||||
66 | $output .= "\n <li><a href=\"/cgi-bin/koha/reports/reports-home.pl\">Reports</a></li>\n "; | ||||
67 | } | ||||
68 | |||||
69 | $output .= "\n "; | ||||
70 | #line 34 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
71 | if (($stash->get('CAN_user_tools'))) { | ||||
72 | $output .= "\n <li><a href=\"/cgi-bin/koha/tools/tools-home.pl\">Tools</a></li>\n "; | ||||
73 | } | ||||
74 | |||||
75 | $output .= "\n "; | ||||
76 | #line 37 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
77 | if (($stash->get('CAN_user_parameters'))) { | ||||
78 | $output .= "\n <li><a href=\"/cgi-bin/koha/admin/admin-home.pl\">Administration</a></li>\n "; | ||||
79 | } | ||||
80 | |||||
81 | $output .= "\n <li><a href=\"/cgi-bin/koha/about.pl\">About Koha</a></li>\n </ul>\n </li>\n </ul>\n <ul class=\"nav pull-right\">\n "; | ||||
82 | #line 105 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
83 | if (($stash->get('loggedinusername'))) { | ||||
84 | $output .= "\n <li class=\"dropdown\">\n <a href=\"#\" id=\"drop3\" role=\"button\" class=\"dropdown-toggle\" data-toggle=\"dropdown\">\n <span class=\"loggedinusername\">"; | ||||
85 | #line 46 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
86 | $output .= $stash->get('loggedinusername'); | ||||
87 | $output .= "</span>\n <span class=\"separator\">|</span>\n "; | ||||
88 | #line 61 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
89 | if (($stash->get('AutoLocation'))) { | ||||
90 | $output .= "\n <brand>\n "; | ||||
91 | #line 50 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
92 | $output .= $stash->get('LoginBranchname'); | ||||
93 | $output .= "\n </brand>\n "; | ||||
94 | } | ||||
95 | else { | ||||
96 | $output .= "\n <strong>\n "; | ||||
97 | #line 59 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
98 | if (($stash->get('LoginBranchname') eq 'NO_LIBRARY_SET')) { | ||||
99 | $output .= "\n NO LIBRARY SET\n "; | ||||
100 | } | ||||
101 | else { | ||||
102 | $output .= "\n <span id=\"logged-in-branch-name\">"; | ||||
103 | #line 57 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
104 | $output .= $stash->get('LoginBranchname'); | ||||
105 | $output .= "</span>\n <span id=\"logged-in-branch-code\" class=\"content_hidden\">"; | ||||
106 | #line 58 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
107 | $output .= $stash->get(['Branches', 0, 'GetLoggedInBranchcode', 0]); | ||||
108 | $output .= "</span>\n "; | ||||
109 | } | ||||
110 | |||||
111 | $output .= "\n </strong>\n "; | ||||
112 | } | ||||
113 | |||||
114 | $output .= "\n <b class=\"caret\"></b>\n </a>\n <ul class=\"dropdown-menu\" role=\"menu\" aria-labelledby=\"drop3\">\n "; | ||||
115 | #line 75 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
116 | if (($stash->get('IndependentBranches'))) { | ||||
117 | $output .= "\n "; | ||||
118 | #line 70 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
119 | if (($stash->get('CAN_user_management') || $stash->get('CAN_user_editcatalogue_edit_catalogue'))) { | ||||
120 | $output .= "\n <li>\n <a class=\"toplinks\" href=\"/cgi-bin/koha/circ/selectbranchprinter.pl\">Set library</a>\n </li>\n "; | ||||
121 | } | ||||
122 | |||||
123 | $output .= "\n "; | ||||
124 | } | ||||
125 | else { | ||||
126 | $output .= "\n <li>\n <a class=\"toplinks\" href=\"/cgi-bin/koha/circ/selectbranchprinter.pl\">Set library</a>\n </li>\n "; | ||||
127 | } | ||||
128 | |||||
129 | $output .= "\n "; | ||||
130 | #line 80 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
131 | if ($stash->get('EnableSearchHistory')) { | ||||
132 | $output .= "\n <li>\n <a class=\"toplinks\" href=\"/cgi-bin/koha/catalogue/search-history.pl\">Search history</a>\n </li>\n "; | ||||
133 | } | ||||
134 | |||||
135 | $output .= "\n "; | ||||
136 | #line 88 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
137 | if ($stash->get('loggedinusernumber')) { | ||||
138 | $output .= "\n <li class =\"toplinks-myaccount\">\n <a class=\"toplinks\" href=\"/cgi-bin/koha/members/moremember.pl?borrowernumber="; | ||||
139 | #line 83 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
140 | $output .= $stash->get('loggedinusernumber'); | ||||
141 | $output .= "\">My account</a>\n </li>\n <li class=\"toplinks-mycheckouts\">\n <a class=\"toplinks\" href=\"/cgi-bin/koha/circ/circulation.pl?borrowernumber="; | ||||
142 | #line 86 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
143 | $output .= $stash->get('loggedinusernumber'); | ||||
144 | $output .= "\">My checkouts</a>\n </li>\n "; | ||||
145 | } | ||||
146 | |||||
147 | $output .= "\n <li>\n <a id=\"logout\" class=\"toplinks\" href=\"/cgi-bin/koha/mainpage.pl?logout.x=1\">Log out</a>\n </li>\n </ul>\n </li>\n <li>\n <a class=\"toplinks\" href=\"/cgi-bin/koha/help.pl\" id=\"helper\">Help</a>\n </li>\n "; | ||||
148 | } | ||||
149 | else { | ||||
150 | $output .= "\n <li class=\"loggedout\">\n <span>\n <a href=\"/cgi-bin/koha/mainpage.pl\" id=\"login\">Log in</a>\n <span class=\"separator\">|</span>\n <a class=\"toplinks\" href=\"/cgi-bin/koha/help.pl\" id=\"helper\">Help</a>\n </span>\n </li>\n "; | ||||
151 | } | ||||
152 | |||||
153 | $output .= "\n </ul>\n </div>\n "; | ||||
154 | #line 108 "/home/vagrant/kohaclone/koha-tmpl/intranet-tmpl/prog/en/includes/header.inc" | ||||
155 | if (($stash->get('intranetbookbag'))) { | ||||
156 | $output .= "<div id=\"cartDetails\">Your cart is empty.</div>"; | ||||
157 | } | ||||
158 | |||||
159 | $output .= "\n</div>\n"; | ||||
160 | } }; | ||||
161 | if ($@) { | ||||
162 | $_tt_error = $context->catch($@, \$output); | ||||
163 | die $_tt_error unless $_tt_error->type eq 'return'; | ||||
164 | } | ||||
165 | |||||
166 | return $output; | ||||
167 | } | ||||
168 | |||||
169 | ; |